home *** CD-ROM | disk | FTP | other *** search
/ Directorty Opus 5 - Magellan 2 / Opus 5 - Magellan 2.iso / Extras / wolledopus / dopus5 / arexx / DS.dopus5 < prev    next >
Text File  |  1998-01-21  |  510b  |  29 lines
  1. /*
  2. $VER: DS.dopus5 V0.98 (21.01.1998) © Marco Wollkopf
  3. E-Mail: Marco.Wollkopf@t-online.de
  4. Homepage: http://home.t-online.de/home/Marco.Wollkopf
  5.  
  6. HilfsScript für Shell-Befehl DS
  7.  
  8.  
  9. Einstellungen:
  10. -----------------------------------------------
  11. keine
  12. -----------------------------------------------
  13.  
  14. */
  15.  
  16. options results
  17. parse arg port
  18.  
  19. IF SHOW('P','DOPUS.1') THEN
  20.    address DOPUS.1
  21. ELSE DO
  22.    SAY "DirectoryOpus nicht gefunden"
  23.    EXIT
  24. END
  25.  
  26. lister query source
  27. slister=result
  28. lister query slister path
  29. say result